object Form1: TForm1 Left = 99 Top = 62 Width = 435 Height = 300 BorderIcons = [biSystemMenu] Caption = 'Extensibility Help' Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter TextHeight = 16 object Memo1: TMemo Left = 12 Top = 8 Width = 403 Height = 217 Lines.Strings = ( 'An added benefit of the extensibility of FormulaBuilder is ' 'the ability to act as a cheap single line macro evaluator or ' 'command processor. FormulaBuilder places no restrictions ' 'on the "side-effects" of functions registered with the engine - ' 'the callback simply has to adhere to the prototype' '' '' ' In reality, anything programmable can be done with in the ' 'callback, so a programmer could write a callback for each ' 'function/procedure from a library of the Win Api she wishes ' 'to make available to the user at runtime. The corresponding ' 'constants can be declared with FBAddConstant.' '' ' Try the following lines :' ' ' ' MsgBox("Today'#39's date is "+datetostr(Today()))' ' Copyfile("C:\autoexec.bat","C:\autobak.bak")' ' exec("notepad.exe",SW_SHOWMAXIMIZED)' ' beep(MB_ICONHAND)' ' ') TabOrder = 0 end object BitBtn1: TBitBtn Left = 174 Top = 232 Width = 89 Height = 33 TabOrder = 1 Kind = bkOK end end